﻿Public Class DocumentoBulto

    Public _CIA, _SUC, _TDOC, _DCICODIGO As String
    Public _DCBCODIGO, _DCBCANTIDAD As Integer
    Public _TCACAJA As String
    Public _PESONETO, _PESOBRUTO As Decimal
    Public _CAJA, _PRECINTO, _OBSERVACION As String
    Public _FECHAINICIO As String

    Sub New()

    End Sub

    Sub New(cia As String, suc As String, tdoc As String, dcicod As String, dcbcod As Integer, tcaCaja As String, dcbcanti As Integer, _
            pesNeto As Decimal, pesBruto As Decimal, caja As String, precinto As String, observacion As String, fechaIni As String)
        Me._CIA = cia
        Me._SUC = suc
        Me._TDOC = tdoc
        Me._DCICODIGO = dcicod
        Me._DCBCODIGO = dcbcod
        Me._TCACAJA = tcaCaja
        Me._DCBCANTIDAD = dcbcanti
        Me._PESONETO = pesNeto
        Me._PESOBRUTO = pesBruto
        Me._CAJA = caja
        Me._PRECINTO = precinto
        Me._OBSERVACION = observacion
        Me._FECHAINICIO = fechaIni
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(value As String)
            _SUC = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCICODIGO
        End Get
        Set(value As String)
            _DCICODIGO = value
        End Set
    End Property

    Public Property DCB_Codigo() As Integer
        Get
            Return _DCBCODIGO
        End Get
        Set(value As Integer)
            _DCBCODIGO = value
        End Set
    End Property

    Public Property DCB_Cantidad() As Integer
        Get
            Return _DCBCANTIDAD
        End Get
        Set(value As Integer)
            _DCBCANTIDAD = value
        End Set
    End Property

    Public Property TCA_Caja() As String
        Get
            Return _TCACAJA
        End Get
        Set(value As String)
            _TCACAJA = value
        End Set
    End Property

    Public Property DCB_PesoNeto() As Decimal
        Get
            Return _PESONETO
        End Get
        Set(value As Decimal)
            _PESONETO = value
        End Set
    End Property

    Public Property DCB_PesoBruto() As Decimal
        Get
            Return _PESOBRUTO
        End Get
        Set(value As Decimal)
            _PESOBRUTO = value
        End Set
    End Property

    Public Property DCB_Caja() As String
        Get
            Return _CAJA
        End Get
        Set(value As String)
            _CAJA = value
        End Set
    End Property

    Public Property DCB_Precinto() As String
        Get
            Return _PRECINTO
        End Get
        Set(value As String)
            _PRECINTO = value
        End Set
    End Property

    Public Property DCB_Observacion() As String
        Get
            Return _OBSERVACION
        End Get
        Set(value As String)
            _OBSERVACION = value
        End Set
    End Property

    Public Property DCB_FechaInicio() As String
        Get
            Return _FECHAINICIO
        End Get
        Set(value As String)
            _FECHAINICIO = value
        End Set
    End Property

End Class
